gShoppingTokenProps = {}
gShoppingTokenProps["Neighbor ID"] = 1
gShoppingTokenProps["Dollar Amount Div"] = 2
gShoppingTokenProps["Dollar Amount Mod"] = 3
gShoppingTokenProps["Wholesale Cost Div"] = 4
gShoppingTokenProps["Wholesale Cost Mod"] = 5
gShoppingTokenProps["Special Flag"] = 6
gShoppingTokenProps["Extra Data 2"] = 7
gRemoteBusinessProps = {}
gRemoteBusinessProps["Token GUID"] = 277825503
gRemoteBusinessProps["kRemoteBusinessInvCategory"] = 15
gRemoteBusinessProps["Inv Category"] = 1
gRemoteBusinessProps["Lot ID"] = 2
gRemoteBusinessProps["Has Been Visited?"] = 3
gRemoteBusinessProps["Has Manager?"] = 4
gRemoteBusinessProps["Amount Div"] = 5
gRemoteBusinessProps["Amount Mod"] = 6
gRemoteBusinessProps["Times Delivered"] = 7
gRemoteBusinessProps["Has Been Called?"] = 8
gRemoteBusinessProps["Times Called"] = 9
gRemoteBusinessProps["Business Rank"] = 10
gRemoteBusinessProps["Call Time"] = 11
gTokenCategories = {}
gTokenCategories["None"] = 0
gTokenCategories["Leftovers"] = 1
gTokenCategories["VacationPartyInfo"] = 2
gVoodooDollUsageProps = {}
gVoodooDollUsageProps["Token GUID"] = 858267470
gVoodooDollUsageProps["Uses"] = 1
gVoodooDollUsageProps["Hours Till Dec"] = 2
gVoodooDollUsageProps["Intial Hours Till Dec"] = 3

function function_64(param0)
	myvar_1 = BitwiseOr(InventoryToken["kFlagShopping"], InventoryToken["kFlagVisible"])
	GetSimulatorGlobal(SimulatorGlobal["Current House"])
	myvar_3 = Inventory["new"]()
	myvar_4 = myvar_3["getTokensByFlags"](myvar_3, myvar_1)
	local myvar_5 = 1
	for loopvar1, loopvar2 in myvar_4 do 
	myvar_10 = loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Neighbor ID"])
		if (myvar_10 == param0) then
		{}[loopvar1] = loopvar2
		myvar_5 = myvar_5 + 1
	end
	end
	myvar_5 = myvar_5 - 1
	return {}, myvar_5
end

{}["GetShoppingTokens"] = function_64

function function_66(param0)
	myvar_1 = BitwiseOr(InventoryToken["kFlagShopping"], InventoryToken["kFlagVisible"])
	myvar_3 = Inventory["new"](Inventory["kTypeNeighbor"], param0)
	myvar_4 = myvar_3["getTokensByFlags"](myvar_3, myvar_1)
	local myvar_5 = 1
	for loopvar1, loopvar2 in myvar_4 do 
	myvar_10 = loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Neighbor ID"])
		if (myvar_10 == param0) then
		{}[loopvar1] = loopvar2
		myvar_5 = myvar_5 + 1
	end
	end
	myvar_5 = myvar_5 - 1
	return {}, myvar_5
end

{}["GetSimShoppingTokens"] = function_66

function function_68(param0)
	local myvar_1 = 0
	for loopvar1, loopvar2 in param0 do 
	myvar_6 = loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Dollar Amount Div"])
	myvar_1 = myvar_1 + ((myvar_6 * 10000) + loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Dollar Amount Mod"]))
	end
	local myvar_2 = 0
	local myvar_3 = 0
		if (0 < myvar_1) then
		myvar_2 = myvar_1 / 10000
		myvar_6 = myvar_1
		local myvar_7 = 10000
		math["mod"](myvar_6, myvar_7)
		myvar_4 = math["round"]()
		myvar_3 = myvar_4
	end
	myvar_4 = myvar_2
	return myvar_4, myvar_3
end

{}["GetShoppingAmount"] = function_68

function function_70(param0, param1)
	GetSimulatorGlobal(SimulatorGlobal["Current House"])
	myvar_2 = Inventory["new"]()
	myvar_3 = GetNeighborPersonData(param0, PersonData["family number"])
	myvar_4 = CachedFamily["new"](myvar_3)
	myvar_5 = myvar_4["getFunds"](myvar_4)
	local myvar_6 = 0
	local myvar_7 = 0
	for loopvar1, loopvar2 in param1 do 
	myvar_12 = loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Dollar Amount Div"])
	myvar_13 = loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Dollar Amount Mod"])
	myvar_6 = myvar_6 + ((myvar_12 * 10000) + myvar_13)
		if (myvar_5 < myvar_6) then
		myvar_6 = myvar_6 - ((myvar_12 * 10000) + myvar_13)
		myvar_7 = myvar_7 + ((myvar_12 * 10000) + myvar_13)
		loopvar2["setFlag"](loopvar2, InventoryToken["kFlagMarkedForDeletion"])
	end
	end
	myvar_2["removeTokensMarkedForDeletion"](myvar_2)
	return myvar_7
end

{}["CanAffordShoppingInventory"] = function_70

function function_72(param0)
	local myvar_1 = 0
	for loopvar1, loopvar2 in param0 do 
	myvar_6 = loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Wholesale Cost Div"])
	myvar_1 = myvar_1 + ((myvar_6 * 10000) + loopvar2["getProperty"](loopvar2, gShoppingTokenProps["Wholesale Cost Mod"]))
	end
	local myvar_2 = 0
	local myvar_3 = 0
		if (0 < myvar_1) then
		myvar_2 = myvar_1 / 10000
		myvar_6 = myvar_1
		local myvar_7 = 10000
		math["mod"](myvar_6, myvar_7)
		myvar_4 = math["round"]()
		myvar_3 = myvar_4
	end
	myvar_4 = myvar_2
	return myvar_4, myvar_3
end

{}["GetWholesaleAmount"] = function_72

function function_74(param0)
	myvar_1,myvar_2 = nInventory["GetShoppingTokens"](param0)
	return myvar_2
end

{}["GetShoppingTokenCount"] = function_74

function function_76(param0, param1)
	myvar_2 = GetSimulatorGlobal(SimulatorGlobal["Current House"])
		if (nBusiness["LotHasBusiness"](myvar_2) ~= 0) then 
	

		myvar_3 = BusinessInfo["new"](myvar_2)
		myvar_5 = myvar_3["isCustomer"](myvar_3, param0)
			if (myvar_5 ~= 0) then 
	myvar_5 = myvar_5

			
	myvar_5 = myvar_3["getCustomerDataById"]
			myvar_5 = myvar_5(myvar_3, param0)
			myvar_5 = param1
			for loopvar1, loopvar2 in myvar_5 do 
			loopvar2["getGUID"](loopvar2)
			myvar_5["addUsedObjectGUID"]()
			end
		else
		end
	end
end

{}["AddTokensAsPurchase"] = function_76

function function_78(param0, param1)
	myvar_2 = Neighborhood["new"]()
		if (myvar_2["isValidLot"](myvar_2, param0) ~= 0) then 
	

			if (0 < myvar_2["getLotType"](myvar_2, param0)) then
				if (nBusiness["LotHasBusiness"](param0) ~= 0) then 
	

				myvar_3 = Inventory["new"](Inventory["kTypeFamily"], param1)
				myvar_4 = myvar_3["getTokensByGUID"](myvar_3, gRemoteBusinessProps["Token GUID"])
				for loopvar1, loopvar2 in myvar_4 do 
				myvar_10 = loopvar2["getProperty"](loopvar2, gRemoteBusinessProps["Lot ID"])
					if (myvar_10 == param0) then
				else
					end
				end
					if (loopvar2 == nil) then
					myvar_10 = param0
					local myvar_11 = 0
					local myvar_18 = 0
					local myvar_19 = 0
					myvar_3["addToken"](myvar_3, gRemoteBusinessProps["Token GUID"], gRemoteBusinessProps["kRemoteBusinessInvCategory"], myvar_10, myvar_11, 0, 0, 0, 0, 0, 0, myvar_18, myvar_19)
					myvar_4 = myvar_3["getTokensByGUID"](myvar_3, gRemoteBusinessProps["Token GUID"])
					gRemoteBusinessProps["Token GUID"], gRemoteBusinessProps["kRemoteBusinessInvCategory"], myvar_10 = nil
					for loopvar1, myvar_10 in myvar_4 do 
					end
				end
				myvar_4[loopvar1]["setProperty"](myvar_4[loopvar1], gRemoteBusinessProps["Has Been Visited?"], 1)
				myvar_4[loopvar1]["setProperty"](myvar_4[loopvar1], gRemoteBusinessProps["Times Delivered"], 0)
				myvar_4[loopvar1]["setProperty"](myvar_4[loopvar1], gRemoteBusinessProps["Has Been Called?"], 0)
				local myvar_9 = 0
				myvar_4[loopvar1]["setProperty"](myvar_4[loopvar1], gRemoteBusinessProps["Times Called"], myvar_9)
				myvar_6 = BusinessInfo["new"](param0)
				myvar_7,myvar_8,myvar_9,myvar_10 = myvar_6["getTotals"](myvar_6)
				myvar_11 = myvar_7 / myvar_10
				math["mod"](myvar_11, 10000)
					if ((myvar_11 / 10000) == nil) then
					local myvar_12 = 0
				end
					if (math["round"]() == nil) then
					local myvar_13 = 0
				end
				myvar_4[loopvar1]["setProperty"](myvar_4[loopvar1], gRemoteBusinessProps["Amount Div"], myvar_12)
				myvar_4[loopvar1]["setProperty"](myvar_4[loopvar1], gRemoteBusinessProps["Amount Mod"], myvar_13)
				local myvar_14 = 16394
				local myvar_15 = -12145
				local myvar_16 = -9953
				local myvar_17 = 12651
				myvar_19 = myvar_6
	myvar_18 = myvar_6["getEmployeeIds"]
				myvar_18 = myvar_18(myvar_19)
				
	myvar_19 = myvar_4[loopvar1]["setProperty"]
				local myvar_22 = 0
				myvar_19(myvar_4[loopvar1], gRemoteBusinessProps["Has Manager?"], myvar_22)
				myvar_19 = myvar_18
				myvar_4[loopvar1], gRemoteBusinessProps["Has Manager?"], myvar_22 = nil
				for loopvar1, myvar_22 in myvar_19 do 
				myvar_23 = Neighbor["new"](myvar_22)
				local myvar_26 = "Job Object GUID1"
				myvar_24 = myvar_23["GetLivePersonData"](myvar_23, myvar_26)
				myvar_26 = myvar_23
	
				local myvar_27 = "Job Object GUID2"
				myvar_25 = myvar_23["GetLivePersonData"](myvar_26, myvar_27)
				myvar_27 = myvar_23
	myvar_26 = myvar_23["GetLivePersonData"]
				local myvar_28 = "Job Promotion Level"
				myvar_26 = myvar_26(myvar_27, myvar_28)
					if (myvar_24 == myvar_14) then
						if (myvar_25 == myvar_15) then
							if (myvar_26 == 2) then
							myvar_28 = myvar_4[loopvar1]
	myvar_27 = myvar_4[loopvar1]["setProperty"]
							myvar_27(myvar_28, gRemoteBusinessProps["Has Manager?"], myvar_22)
						else
								if (myvar_24 == myvar_16) then
									if (myvar_25 == myvar_17) then
										if (myvar_26 == 2) then
										myvar_28 = myvar_4[loopvar1]
	myvar_27 = myvar_4[loopvar1]["setProperty"]
										myvar_27(myvar_28, gRemoteBusinessProps["Has Manager?"], myvar_22)
									end
								end
							end
						end
					end
				end
				end
				
	myvar_19 = myvar_4[loopvar1]["setProperty"]
				myvar_23 = myvar_6
	myvar_22 = myvar_6["getRank"]
				myvar_22(myvar_23)
				myvar_19()
			end
		end
	end
end

{}["UpdateRemoteBusinessData"] = function_78

function function_80(param0)
	GetSimulatorGlobal(SimulatorGlobal["Current House"])
	myvar_1 = Inventory["new"]()
	myvar_2 = myvar_1["getTokenAtIndex"](myvar_1, param0)
	myvar_2["setCategory"](myvar_2, gTokenCategories["Leftovers"])
end

{}["MakeTokenLeftover"] = function_80
nInventory = {}
